home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Windows 3-Pak - Disc 3
/
Infomagic - Windows 3-Pak (Disc 3 of 3).iso
/
Telnet-Clients
/
HOSTACCESS.exe
/
MISC.1
/
UNIX.MCR
< prev
next >
Wrap
Text File
|
1996-01-22
|
380b
|
28 lines
DIM I as integer
I=0
send "CR"
loopy:
wait timeout 10
case "ogin: "
I=I+1
if I > 3 then
print "three attempts have been made to log on"
goto final
endif
send "'root'CR"
delay 5
case "word:"
send "'PIXEL99'CR"
delay 5
case "(ansi) "
passkeys
delay 5
case "# "
send "'sysadmsh'CR"
delay 5
timeout : goto final
end wait
goto loopy
final:
end